﻿Public Class DMLoaiChungTu1
    Dim dt As DataTable
    Private Sub DMLoaiChungTu1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        'TODO: This line of code loads data into the 'DataSetReport.dmuynhiemchi' table. You can move, or remove it, as needed.
        Me.DmloaichungtuTableAdapter.Fill(Me.DataSetReport.dmloaichungtu)
        'TODO: This line of code loads data into the 'DataSetReport.dmloaichungtu' table. You can move, or remove it, as needed.
        Me.ReportViewer1.RefreshReport()
    End Sub
    Public Sub setDt(ByVal dt As DataTable)
        Me.DataSetReport.dmloaichungtu.Clear()
        Me.dt = dt
        Me.DataSetReport.dmloaichungtu.Merge(dt)
    End Sub
End Class